Imports System.Data.SqlClient
Imports System.Data
Imports Entidad
Imports Datos

Public Class EmpresaNegocio

    Dim dao As New EmpresaDatos

    Function listarEmpresas() As DataSet
        Return dao.listarEmpresas()
    End Function

    Public Function consultarEmpresas() As DataTable
        Dim empresas As New EmpresaDatos
        Return empresas.ConsultarEmpresas()
    End Function

    Public Function consultarEmpresasxCodigo(ByVal empresa As String) As Empresa
        Dim empresas As New EmpresaDatos
        Return empresas.ConsultarEmpresasXCodigo(empresa)
    End Function

End Class
